home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / exec / funexist.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  436 b   |  24 lines
  1. /*
  2. \funcref{fun\_exists}{void fun\_exists ()}
  3.     {}
  4.     {}
  5.     {exists()}
  6.     {}
  7.     {funexist.c}
  8.     {
  9.  
  10.         Function {\em fun\_exists()} checks if a file with the name of the
  11.         last pushed string exists. If so, {\em reg.vu.intval} is set to 1.
  12.         Else, the return register indicates 0.
  13.  
  14.     }
  15. */
  16.  
  17. #include "icm-exec.h"
  18.  
  19. void fun_exists ()
  20. {
  21.     reg.type = e_int;
  22.     reg.vu.intval = exists (stack [sp].vu.i->ls.str);
  23. }
  24.